home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'Qbinddlg.pas' rev: 3.00
-
- #ifndef QbinddlgHPP
- #define QbinddlgHPP
- #include <DBTables.hpp>
- #include <Db.hpp>
- #include <Buttons.hpp>
- #include <StdCtrls.hpp>
- #include <Dialogs.hpp>
- #include <Forms.hpp>
- #include <Controls.hpp>
- #include <Graphics.hpp>
- #include <Classes.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysUtils.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Qbinddlg
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TQueryParams;
- class PASCALIMPLEMENTATION TQueryParams : public Forms::TForm
- {
- typedef Forms::TForm inherited;
-
- __published:
- Stdctrls::TGroupBox* GroupBox1;
- Stdctrls::TLabel* Label1;
- Stdctrls::TEdit* ParamValue;
- Stdctrls::TLabel* Label2;
- Stdctrls::TCheckBox* NullValue;
- Stdctrls::TLabel* Label3;
- Stdctrls::TComboBox* TypeList;
- Stdctrls::TListBox* ParamList;
- Stdctrls::TButton* OkBtn;
- Stdctrls::TButton* CancelBtn;
- Stdctrls::TButton* HelpBtn;
- void __fastcall ParamListChange(System::TObject* Sender);
- void __fastcall TypeListChange(System::TObject* Sender);
- void __fastcall ParamValueExit(System::TObject* Sender);
- void __fastcall NullValueClick(System::TObject* Sender);
- void __fastcall FormCreate(System::TObject* Sender);
- void __fastcall OkBtnClick(System::TObject* Sender);
- void __fastcall HelpBtnClick(System::TObject* Sender);
-
- private:
- Dbtables::TParams* InitList;
- bool InValueExit;
- bool InParamChange;
- void __fastcall CheckValue(void);
- bool __fastcall Edit(void);
- void __fastcall Unbind(void);
- public:
- /* TCustomForm.Create */ __fastcall virtual TQueryParams(Classes::TComponent* AOwner) : Forms::TForm(
- AOwner) { }
- /* TCustomForm.CreateNew */ __fastcall TQueryParams(Classes::TComponent* AOwner, int Dummy) : Forms::
- TForm(AOwner, Dummy) { }
- /* TCustomForm.Destroy */ __fastcall virtual ~TQueryParams(void) { }
-
- public:
- /* TWinControl.CreateParented */ __fastcall TQueryParams(HWND ParentWindow) : Forms::TForm(ParentWindow
- ) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
- extern PACKAGE bool __fastcall EditQueryParams(Db::TDataSet* DataSet, Dbtables::TParams* List);
-
- } /* namespace Qbinddlg */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Qbinddlg;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // Qbinddlg
-